home *** CD-ROM | disk | FTP | other *** search
/ Mac Easy 2010 May / Mac Life Ubuntu.iso / casper / filesystem.squashfs / usr / lib / perl / 5.10.0 / asm / termios.ph < prev    next >
Encoding:
Text File  |  2009-06-26  |  1.2 KB  |  26 lines
  1. require '_h2ph_pre.ph';
  2.  
  3. no warnings 'redefine';
  4.  
  5. unless(defined(&_ASM_X86_TERMIOS_H)) {
  6.     eval 'sub _ASM_X86_TERMIOS_H () {1;}' unless defined(&_ASM_X86_TERMIOS_H);
  7.     require 'asm/termbits.ph';
  8.     require 'asm/ioctls.ph';
  9.     eval 'sub NCC () {8;}' unless defined(&NCC);
  10.     eval 'sub TIOCM_LE () {0x1;}' unless defined(&TIOCM_LE);
  11.     eval 'sub TIOCM_DTR () {0x2;}' unless defined(&TIOCM_DTR);
  12.     eval 'sub TIOCM_RTS () {0x4;}' unless defined(&TIOCM_RTS);
  13.     eval 'sub TIOCM_ST () {0x8;}' unless defined(&TIOCM_ST);
  14.     eval 'sub TIOCM_SR () {0x10;}' unless defined(&TIOCM_SR);
  15.     eval 'sub TIOCM_CTS () {0x20;}' unless defined(&TIOCM_CTS);
  16.     eval 'sub TIOCM_CAR () {0x40;}' unless defined(&TIOCM_CAR);
  17.     eval 'sub TIOCM_RNG () {0x80;}' unless defined(&TIOCM_RNG);
  18.     eval 'sub TIOCM_DSR () {0x100;}' unless defined(&TIOCM_DSR);
  19.     eval 'sub TIOCM_CD () { &TIOCM_CAR;}' unless defined(&TIOCM_CD);
  20.     eval 'sub TIOCM_RI () { &TIOCM_RNG;}' unless defined(&TIOCM_RI);
  21.     eval 'sub TIOCM_OUT1 () {0x2000;}' unless defined(&TIOCM_OUT1);
  22.     eval 'sub TIOCM_OUT2 () {0x4000;}' unless defined(&TIOCM_OUT2);
  23.     eval 'sub TIOCM_LOOP () {0x8000;}' unless defined(&TIOCM_LOOP);
  24. }
  25. 1;
  26.